home *** CD-ROM | disk | FTP | other *** search
/ PC Home 109 / PC Home 109.iso / data1.cab / Program_Files / be004.dxr / 00053.ls < prev    next >
Encoding:
Text File  |  2001-03-02  |  287 b   |  15 lines
  1. on exitFrame
  2.   cursorOff()
  3.   set LastTick to the ticks
  4.   repeat while the locH of sprite 13 < 350
  5.     set x to 2 * (the ticks - LastTick)
  6.     set LastTick to the ticks
  7.     set the locH of sprite 13 to the locH of sprite 13 + x
  8.     updateStage()
  9.   end repeat
  10. end
  11.  
  12. on mouseUp
  13.   go(80)
  14. end
  15.